function clear(hfile)
% BVQXfile::clear  - clear an object
%
% FORMAT:       clear(obj);
%
% Input fields:
%
%       obj         valid BVQXfile object
%
% No output fields.

% Version:  v0.7g
% Build:    9100720
% Date:     Oct-07 2009, 8:15 PM CEST
% Author:   Jochen Weber, SCAN Unit, Columbia University, NYC, NY, USA
% URL/Info: http://wiki.brainvoyager.com/BVQXtools

% argument check
if nargin ~= 1 || ...
    ~isa(hfile, 'BVQXfile')
    error( ...
        'BVQXfile:BadArgument', ...
        'Bad or missing argument.' ...
    );
end

% iterate over object
sfile = struct(hfile);
lfile = {sfile(:).L};
lfile = cat(2, lfile{:});
lfile(lfile == 1) = [];
bvqxfile_clear(lfile);
